home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 1998 January / PC Answers Issue 49 Cover CD January 1998.iso / Apps / Director / DATA.Z / Scriptable Authoring.dir / Scripts_46_Select a radio button for the float.ls < prev    next >
Encoding:
Text File  |  1997-05-10  |  613 b   |  13 lines
  1. global gFloatReplaceMember, gPathDelimiter, gFloatName, gPuppetList
  2.  
  3. on mouseDown
  4.   PlaySound("RadioButtonClick")
  5.   set firstSprite to the aquaFloat of gPuppetList
  6.   set secondSprite to the cosmosFloat of gPuppetList
  7.   set thirdSprite to the tropicanaFloat of gPuppetList
  8.   set chosenFloat to SelectRadioButton(the clickOn, "Create Cast Radio Button On", "Create Cast Radio Button Off", [firstSprite, secondSprite, thirdSprite])
  9.   importFileInto(gFloatReplaceMember, the pathName & "ScriptAuthor-Floats" & gPathDelimiter & string(chosenFloat & ".PCT"))
  10.   set gFloatName to chosenFloat
  11.   DisplayCurrentFloat()
  12. end
  13.